home *** CD-ROM | disk | FTP | other *** search
/ The X-Philes (2nd Revision) / The X-Philes Number 1 (1995).iso / xphiles / hp48_1 / howlong_ < prev    next >
Internet Message Format  |  1995-03-31  |  4KB

  1. From: Thomas Pagel <Thomas.Pagel@unnet.w.open.DE>
  2. Subject:  v04i045:  howlong_tp - Give a countdown time for an event v1.0, Part01/01
  3. Newsgroups: comp.sources.hp48
  4. Organization: THE UNDERGROUND NETWORK
  5. Followup-To: comp.sys.hp48
  6. Approved: spell@seq.uncwil.edu
  7.  
  8. Checksum:  393892050 (verify with brik -cv)
  9. Submitted-by: Thomas Pagel <Thomas.Pagel@unnet.w.open.DE>
  10. Posting-number: Volume 4, Issue 45
  11. Archive-name: howlong_tp/part01
  12.  
  13. BEGIN_DOC howlong.doc
  14. When do you have your next date or exam?
  15.  
  16. This litte HP48 program encoded with the ASC-Tool gives you
  17. information how long it lasts to the event, you set time 
  18. and date for.
  19.  
  20. At the beginning of the program, you find two parameters in 
  21. brackets. These has to be changed in the following way:
  22.  
  23. {time  month.dayYear} 
  24.  
  25. like the usual data format of the HP48.
  26. Start the programm and it tells you:
  27. ------------------
  28. How long?
  29.  
  30. 118d 4h 12min 24s
  31.  
  32. or 2836,2 hour(s)
  33. ------------------
  34. Make sure, that you have enough time be prepared for you event!
  35.  
  36. To quit the programm, just press <Return>. Otherwise you will have 
  37. useless variable in your menu....
  38.  
  39. Good luck and always enough time to be prepared for your date..
  40.  
  41. Thomas
  42.  
  43. Internet: thomas.pagel@unnet.w.open.de
  44.  
  45. END_DOC
  46.  
  47. BEGIN_ASC howlong.asc
  48. %%HP: T(1)A(D)F(.);
  49. "D9D20E163247A20339201000000000000810339200000000029918040B2130B7
  50. FC18DBF11C432D6E20304594D4D6E2030441445E1632858A13C032D6E2030441
  51. 44521891DBBF12B9914563284E20104597632DCC023CE227F791D6E20304594D
  52. 4D5CE1AFE22D9D204563284E20104597632AA9028DBF13392010000000000004
  53. 207F791D6E20304594D4E7FB1E7FB178BF1D6BB14563284E20103597632DCC02
  54. 3ABB1339202000000000000010EEDA1D6BB14563284E2010D497632DCC02B213
  55. 05BF22D9D20D6E20304594D47F791E7FB178BF1D6BB14563284E20103597632D
  56. CC023ABB1339202000000000000010EEDA1D6BB14563284E2010D497632DCC02
  57. B21305DF227F791339202000000000000010EEDA13ABB1339202000000000000
  58. 010EEDA1D6BB1339201000000000000060DBBF190DA14563284E203035543497
  59. 632DCC024563284E2010459763204B02339201000000000000420EEDA1456328
  60. 4E2010359763204B0276BA14563284E2020354597632DCC02C2A205200002020
  61. 20284F47502C4F4E47402F3A0A04563284E2010459763204B02B0BC1C2A20900
  62. 00460276BA176BA14563284E2010359763204B02B0BC1C2A2090000860276BA1
  63. 76BA14563284E2010D49763204B02B0BC1C2A20D0000D696E6024563284E2030
  64. 3554349763204B02C2A20B000037A0A076BA176BA176BA176BA1C2A20B0000F6
  65. 27024563284E202035459763204B02ED2A255DB1B0BC14563284E2010D497632
  66. 04B0233920200000000000001050FA1E3FB19C2A255DB1B0BC1C2A2071000028
  67. 6F657278237921276BA176BA176BA176BA19C2A2485A1DE032378A19B63247A2
  68. 084E203035543484E2020354584E2010D484E20103584E201045B2130EFE028D
  69. BF1EF53293632B213049FC"
  70. END_ASC
  71.  
  72.  
  73. BYTES: #CF94h 649
  74.  
  75. BEGIN_UU howlong.uue
  76. begin 644 howlong
  77. M2%!(4#0X+46=+>!A(W0J,),"`0``````@`$S*0`````@F8%`L!(#>\^!O1_!
  78. M--+F`@-424UM+C!`%$3E82-8J#$,(VTN,$`41"6!&;W[(9L95#:"Y`(!5'DV
  79. MTLP@PRYR?QEM+C!`E=34Q1[Z+M+9`E0V@N0"`51Y-J*:(-C[,9,"`0``````
  80. M0`+WE]'F`@-424U^O^'W&X?[T;8;5#:"Y`(!4WDVTLP@H[LQDP("````````
  81. M`>ZMT;8;5#:"Y`(!37DVTLP@*S%0^R*=+=#F`@-424WWE^'W&X?[T;8;5#:"
  82. MY`(!4WDVTLP@H[LQDP("`````````>ZMT;8;5#:"Y`(!37DVTLP@*S%0_2+W
  83. MES&3`@(````````![JTQNALS*2`````````0X-X:;;LQDP(!````````!KW[
  84. MD=`:5#:"Y`(#4T5#>3;2S"!4-H+D`@%4>38"M"`S*1`````````DX-X:5#:"
  85. MY`(!4WDV`K0@9ZM!92-(+B`P195G(\T,PJ(")0```@("@O1T!<+TY'0$\J.@
  86. M0&4C2"X00)5G(T`+LK`<+"J0``!D(&>K<;8:5#:"Y`(!4WDV`K0@"\O!H@()
  87. M`(`&<K8:9ZM!92-(+A#0E&<C0`NRL!PL*M```&UI;B!4-H+D`@-314-Y-@*T
  88. M("PJL```<PH*9ZMQMAIGJW&V&BPJL```;W(@5#:"Y`("4U1Y-@*T(-ZB4M4;
  89. M"\M!92-(+A#0E&<C0`LRDP("`````````06OX?,;R:)2U1L+R\&B`A<``(+V
  90. M5B>',I<2<K8:9ZMQMAIGJY$L*H2ET0XC<ZB1:R-T*H#D`@-314-(+B`P187D
  91. ;`@%-2"X0,(7D`@%4*S'@[R#8^^%?(SDVLA(#
  92. `
  93. end
  94. END_UU
  95.